﻿Public Class EntrevistaFalloAlta
    Inherits ExceptionManager

    Public Sub New(innerException As System.Exception)
        MyBase.New("Error durante el alta de la Entrevista")
        Me.codigo = Utils.Enumeradores.Excepeciones.EntrevistaFalloAlta
        Me.tipo = MsgBoxStyle.Exclamation
        Me.mensaje = "Error durante el alta de la Entrevista"
        Me.innerException2 = innerException
    End Sub
End Class

Public Class EntrevistaFalloEditar
    Inherits ExceptionManager

    Public Sub New(innerException As System.Exception)
        MyBase.New("Error durante la actualización de la Entrevista")
        Me.codigo = Utils.Enumeradores.Excepeciones.EntrevistaFalloEditar
        Me.tipo = MsgBoxStyle.Exclamation
        Me.mensaje = "Error durante la actualización de la Entrevista"
        Me.innerException2 = innerException
    End Sub
End Class

Public Class EntrevistaFalloBaja
    Inherits ExceptionManager

    Public Sub New(innerException As System.Exception)
        MyBase.New("Error durante la baja de la Entrevista")
        Me.codigo = Utils.Enumeradores.Excepeciones.EntrevistaFalloEliminar
        Me.tipo = MsgBoxStyle.Exclamation
        Me.mensaje = "Error durante la baja de la Entrevista"
        Me.innerException2 = innerException
    End Sub
End Class

Public Class EntrevistaFalloBuscar
    Inherits ExceptionManager

    Public Sub New(innerException As System.Exception)
        MyBase.New("Error durante la búsqueda de la Entrevista")
        Me.codigo = Utils.Enumeradores.Excepeciones.EntrevistaFalloBuscar
        Me.tipo = MsgBoxStyle.Exclamation
        Me.mensaje = "Error durante la búsqueda de la Entrevista"
        Me.innerException2 = innerException
    End Sub
End Class

Public Class EntrevistaFalloConsultar
    Inherits ExceptionManager

    Public Sub New(innerException As System.Exception)
        MyBase.New("Error durante la consulta de Entrevistas")
        Me.codigo = Utils.Enumeradores.Excepeciones.EntrevistaFalloConsultar
        Me.tipo = MsgBoxStyle.Exclamation
        Me.mensaje = "Error durante la consulta de Entrevistas"
        Me.innerException2 = innerException
    End Sub
End Class
